|
Click-Ereignis, CommandButton-Steuerelement, Accelerator-Eigenschaft, Caption-Eigenschaft (Beispiel)
Artikel04/07/2023
This example changes the Accelerator and Caption properties of a CommandButton each time the user clicks the button by using the mouse or the accelerator key. Das Click-Ereignis enth盲lt den Code zum 脛ndern der Eigenschaften Accelerator und Caption .
F眉gen Sie f眉r dieses Beispiel den Code in den Abschnitt "Deklarationen" eines Formulars ein, das ein CommandButton -Steuerelement mit der Bezeichnung "CommandButton1" besitzt.
Private Sub UserForm_Initialize()
CommandButton1.Accelerator = "C"
'Set Accelerator key to COMMAND + C
End Sub
Private Sub CommandButton1_Click ()
If CommandButton1.Caption = "OK" Then
'Check caption, then change it.
CommandButton1.Caption = "Clicked"
CommandButton1.Accelerator = "C"
'Set Accelerator key to COMMAND + C
Else
CommandButton1.Caption = "OK"
CommandButton1.Accelerator = "O"
'Set Accelerator key to COMMAND + O
End If
End Sub
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den M枚glichkeiten, wie Sie Support erhalten und Feedback abgeben k枚nnen.
|